 |
 SoapConnect whit Scandinavian character set ~Bill Desjipymanakoi 01/27/2004 07:43 AM Domino Designer 6.5 Windows XP
If your computer use scandinavian character set, you have to do changes in SoapConnect.
You have to replace "." with ","
Function ReplaceSubstring(inputStr As String, fromStr As String, toStr As
String) As String
' This function acts similarly to the @Formula language function '
@ReplaceSubstring'
Dim newStr As String
Dim position As Integer
newStr = inputStr
While Instr(newStr, fromStr) > 0
position = Instr(newStr, fromStr)
newStr = Left$(newStr, position - 1) + toStr + Right$(newStr,
Len(newStr) - (position + Len(fromStr) - 1))
Wend
ReplaceSubstring = newStr
End Function
Dim soapReturnVariant As variant
soapReturn = ReplaceSubstring(soapDoc.ReturnValue(0), ".", ",")
Select Case soapDoc.ReturnType(0)
Case "2": ' Integer
ReturnValue = Cint(soapReturn)
...
Arnt
Go back |